home *** CD-ROM | disk | FTP | other *** search
/ PsL Monthly 1993 December / PSL Monthly Shareware CD-ROM (December 1993).iso / prgmming / dos / c / tcclib.exe / HLIN.C < prev    next >
Encoding:
Text File  |  1989-07-18  |  818 b   |  42 lines
  1. unsigned char far *ScrPtr( int x, int y );
  2.  
  3. void HLin( int x, int y, int xx, int yy )
  4. {
  5.     register unsigned char far *scptr = ScrPtr( x, y );
  6.     register int i;
  7.  
  8.     if ( x == xx ) {
  9.         switch( *scptr ) {
  10.             case 186 : *scptr = 206; break;
  11.             case 179 : *scptr = 216; break;
  12.             default  : *scptr = 205; break;
  13.         }
  14.         return;
  15.     }
  16.  
  17.     switch( *scptr ) {
  18.         case 186 : *scptr = 204; break;
  19.         case 179 : *scptr = 198; break;
  20.         default  : *scptr = 205; break;
  21.     }
  22.     scptr++;
  23.     scptr++;
  24.  
  25.     for (i=x+1; i<xx; ++i) {
  26.         switch( *scptr ) {
  27.             case 186 : *scptr = 206; break;
  28.             case 179 : *scptr = 216; break;
  29.             default  : *scptr = 205; break;
  30.         }
  31.         scptr++;
  32.         scptr++;
  33.     }
  34.  
  35.     switch( *scptr ) {
  36.         case 186 : *scptr = 185; break;
  37.         case 179 : *scptr = 181; break;
  38.         default  : *scptr = 205; break;
  39.     }
  40.  
  41. }
  42.